home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Game / C / CORE! 1.1.CPT / Core! 1.1 / Battle Programs / contest89 / VAMP.RED < prev    next >
Encoding:
Text File  |  1991-08-13  |  936 b   |  20 lines
  1. ;Warrior VAMP;by Stefan Roettger, D-8525 Uttenreuth
  2. ;
  3. ;
  4. start    spl  search             ;split program execution to main task
  5.          mov #0        start     ;initialize pointer to buffer
  6. cbuf     mov #1       <start     ;build a buffer containing #1
  7.          djn  cbuf     c         ;is the buffer big enough?
  8. c        dat #41                 ;counter and end for buffer task
  9. search   mov  bomb1   @p         ;bomb core with bomb1
  10.          add #18       p         ;skip 18
  11.          mov  bomb2   @p         ;bomb core with bomb2
  12.          add #23       p         ;skip 23
  13.          djn  search  @p         ;run into buffer?
  14.          mov #1       @p         ;repair damaged buffer
  15.          add #820      p         ;do not bomb own program
  16.          jmp  search             ;continue bombing
  17. bomb1    spl  0                  ;spl bomb to slow down opponent
  18. bomb2    jmp  -18                ;jmp bomb to confuse and kill
  19. p        dat #2048
  20.